home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / 12d2.dir / 00001.ls next >
Encoding:
Text File  |  1999-04-02  |  1.3 KB  |  54 lines
  1. on startMovie
  2.   global qtChan, gKnobSprite
  3.   sprite(10).visible = 0
  4.   puppetSprite(46, 1)
  5.   qtChan = 11
  6.   sprite(qtChan).volume = 256
  7.   preLoad(qtChan - 1)
  8.   set the mouseDownScript to EMPTY
  9.   set the mouseUpScript to EMPTY
  10.   gKnobSprite = 26
  11.   setUpKnob()
  12. end
  13.  
  14. on idle
  15.   global gCursorReady
  16.   if gCursorReady = 1 then
  17.     cursor(200)
  18.     checkCursors()
  19.     set the locH of sprite 46 to the mouseH
  20.     set the locV of sprite 46 to the mouseV
  21.     updateStage()
  22.   end if
  23. end
  24.  
  25. on checkCursors
  26.   global gMagCursor
  27.   set the castNum of sprite 46 to the number of member "curs1"
  28.   if rollOver(5) then
  29.     set the castNum of sprite 46 to the number of member "hotCursor"
  30.   end if
  31.   if rollOver(6) then
  32.     set the castNum of sprite 46 to the number of member "hotCursor"
  33.   end if
  34.   if rollOver(7) then
  35.     set the castNum of sprite 46 to the number of member "curs1"
  36.   end if
  37.   if rollOver(12) or rollOver(13) then
  38.     set the castNum of sprite 46 to the number of member "linkCurs"
  39.   end if
  40.   if rollOver(25) then
  41.     set the castNum of sprite 46 to the number of member "hotCursor"
  42.   end if
  43.   repeat with i = 33 to 35
  44.     if rollOver(i) then
  45.       set the castNum of sprite 46 to the number of member "hotCursor"
  46.     end if
  47.   end repeat
  48.   repeat with i = 40 to 43
  49.     if rollOver(i) then
  50.       set the castNum of sprite 46 to the number of member "hotCursor"
  51.     end if
  52.   end repeat
  53. end
  54.